< previous page page_440 next page >

Page 440
LISTING 19.2.CONTINUED
9f8044bafea36a1f728739c0bb58ef4c.gif
202: '##ModelId=352AB4E403DE
203: Public Sub queryAgain()
204: End Sub
205:
206: '##ModelId=352AB4E501EA
207: Public Property Let pBOF(ByVal vData As Boolean)
208: 'used when assigning a value to the property, on the left side of an   assignment.
209: 'Syntax: X.pBOF = 5
210:     mvarpBOF = vData
211: End Property
212:
213:
214: '##ModelId=352AB4E500D2
215: Public Property Get pBOF() As Boolean
216: 'used when retrieving value of a property, on the right side of an   assignment.
217: 'Syntax: Debug.Print X.pBOF
218:     pBOF = mvarpBOF
219: End Property
220:
221:
222:
223: '##ModelId=352AB4E600C8
224: Public Property Let pEOF(ByVal vData As Boolean)
225: 'used when assigning a value to the property, on the left side of an   assignment.
226: 'Syntax: X.pEOF = 5
227:     mvarpEOF = vData
228: End Property
229:
230:
231: '##ModelId=352AB4E503A2
232: Public Property Get pEOF() As Boolean
233: 'used when retrieving value of a property, on the right side of an   assignment.
234: 'Syntax: Debug.Print X.pEOF
235:     pEOF = mvarpEOF
236: End Property
237:
238:
239:
240: '##ModelId=352AB4E6038E
241: Public Property Set pTblColumns(ByVal vData As Object)
242: 'used when assigning an Object to the property, on the left side of a   Set statement.
243: 'Syntax: Set x.pTblColumns = Form1
244:     Set mvarpTblColumns = vData
continues

 
< previous page page_440 next page >

If you like this book, buy it!